home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_03 / swiout < prev   
Unknown  |  1987-11-28  |  2.3 KB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert Truevision Targa Graphic (image/tga) magic Supported
100% file data default
100% xdgMime image/x-tga default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0f 20 f4 20 3e | 20 53 57 49 4f 55 54 0d |.... . >| SWIOUT.|
|00000010| 00 14 04 0d 00 1e 1c 20 | f4 20 4e 65 69 6c 20 53 |....... |. Neil S|
|00000020| 74 72 6f 6e 67 2c 20 31 | 31 2e 31 31 2e 38 37 0d |trong, 1|1.11.87.|
|00000030| 00 28 04 0d 00 32 3e 20 | f4 20 50 72 6f 64 75 63 |.(...2> |. Produc|
|00000040| 65 73 20 61 20 6c 69 73 | 74 20 6f 66 20 75 73 65 |es a lis|t of use|
|00000050| 64 20 73 6f 66 74 77 61 | 72 65 20 69 6e 74 65 72 |d softwa|re inter|
|00000060| 72 75 70 74 20 73 74 72 | 69 6e 67 20 6e 61 6d 65 |rupt str|ing name|
|00000070| 73 0d 00 3c 26 20 f4 20 | 3c 45 73 63 61 70 65 3e |s..<& . |<Escape>|
|00000080| 20 77 69 6c 6c 20 69 6e | 74 65 72 72 75 70 74 20 | will in|terrupt |
|00000090| 6c 69 73 74 69 6e 67 0d | 00 46 40 20 f4 20 56 44 |listing.|.F@ . VD|
|000000a0| 55 20 32 20 62 65 66 6f | 72 65 20 74 68 65 20 43 |U 2 befo|re the C|
|000000b0| 41 4c 4c 20 74 6f 20 70 | 72 69 6e 74 20 6f 75 74 |ALL to p|rint out|
|000000c0| 20 72 65 73 75 6c 74 73 | 20 28 20 3e 20 32 37 20 | results| ( > 27 |
|000000d0| 70 61 67 65 73 20 29 0d | 00 50 05 20 0d 00 5a 11 |pages ).|.P. ..Z.|
|000000e0| 20 2a 4b 45 59 31 32 45 | 44 49 54 7c 4d 0d 00 64 | *KEY12E|DIT|M..d|
|000000f0| 11 20 de 20 63 6f 64 65 | 25 20 31 30 30 30 0d 00 |. . code|% 1000..|
|00000100| 6e 16 20 e3 20 70 61 73 | 73 25 3d 30 20 b8 20 32 |n. . pas|s%=0 . 2|
|00000110| 20 88 20 32 0d 00 78 0d | 20 50 25 3d 63 6f 64 65 | . 2..x.| P%=code|
|00000120| 25 0d 00 82 04 0d 00 8c | 0a 20 70 63 3d 31 35 0d |%.......|. pc=15.|
|00000130| 00 96 0c 20 6c 69 6e 6b | 3d 31 34 0d 00 a0 0a 20 |... link|=14.... |
|00000140| 73 70 3d 31 33 0d 00 aa | 0e 20 6e 6f 74 73 77 69 |sp=13...|. notswi|
|00000150| 3d 31 32 0d 00 b4 10 20 | 73 77 69 63 6f 75 6e 74 |=12.... |swicount|
|00000160| 3d 31 31 0d 00 be 0e 20 | 63 68 6b 73 77 69 3d 31 |=11.... |chkswi=1|
|00000170| 30 0d 00 c8 0e 20 6e 6f | 74 78 73 77 69 3d 39 0d |0.... no|txswi=9.|
|00000180| 00 d2 04 0d 00 dc 0e 20 | 5b 4f 50 54 70 61 73 73 |....... |[OPTpass|
|00000190| 25 0d 00 e6 04 0d 00 f0 | 17 20 53 54 4d 46 44 20 |%.......|. STMFD |
|000001a0| 28 73 70 29 21 2c 7b 6c | 69 6e 6b 7d 0d 00 fa 3d |(sp)!,{l|ink}...=|
|000001b0| 20 41 44 52 20 6e 6f 74 | 73 77 69 2c 6e 6f 74 75 | ADR not|swi,notu|
|000001c0| 73 65 64 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |sed     |        |
|000001d0| 20 20 20 3b 20 22 55 73 | 65 72 22 20 53 57 49 20 |   ; "Us|er" SWI |
|000001e0| 74 6f 20 69 67 6e 6f 72 | 65 0d 01 04 18 20 4c 44 |to ignor|e.... LD|
|000001f0| 52 20 6e 6f 74 73 77 69 | 2c 5b 6e 6f 74 73 77 69 |R notswi|,[notswi|
|00000200| 5d 0d 01 0e 3e 20 41 44 | 52 20 6e 6f 74 78 73 77 |]...> AD|R notxsw|
|00000210| 69 2c 6e 6f 74 75 73 65 | 64 2b 34 20 20 20 20 20 |i,notuse|d+4     |
|00000220| 20 20 20 20 20 20 20 20 | 3b 20 22 58 55 73 65 72 |        |; "XUser|
|00000230| 22 20 53 57 49 20 74 6f | 20 69 67 6e 6f 72 65 0d |" SWI to| ignore.|
|00000240| 01 18 1a 20 4c 44 52 20 | 6e 6f 74 78 73 77 69 2c |... LDR |notxswi,|
|00000250| 5b 6e 6f 74 78 73 77 69 | 5d 0d 01 22 33 20 4d 4f |[notxswi|].."3 MO|
|00000260| 56 20 73 77 69 63 6f 75 | 6e 74 2c 23 30 20 20 20 |V swicou|nt,#0   |
|00000270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000280| 3b 20 53 74 61 72 74 20 | 61 74 20 30 0d 01 2c 0d |; Start |at 0..,.|
|00000290| 20 2e 6e 65 78 74 73 77 | 69 0d 01 36 47 20 4d 4f | .nextsw|i..6G MO|
|000002a0| 56 20 52 30 2c 73 77 69 | 63 6f 75 6e 74 20 20 20 |V R0,swi|count   |
|000002b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002c0| 3b 20 73 65 74 20 75 70 | 20 70 61 72 61 6d 65 74 |; set up| paramet|
|000002d0| 65 72 73 20 74 6f 20 74 | 72 61 6e 73 6c 61 74 65 |ers to t|ranslate|
|000002e0| 0d 01 40 3e 20 4d 4f 56 | 20 52 32 2c 23 35 30 20 |..@> MOV| R2,#50 |
|000002f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000300| 20 20 20 20 20 20 20 3b | 20 6d 61 78 20 53 57 49 |       ;| max SWI|
|00000310| 20 73 74 72 69 6e 67 20 | 6c 65 6e 67 74 68 0d 01 | string |length..|
|00000320| 4a 3a 20 41 44 52 20 52 | 31 2c 62 75 66 66 65 72 |J: ADR R|1,buffer|
|00000330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000340| 20 20 20 20 20 3b 20 70 | 6c 61 63 65 20 73 74 72 |     ; p|lace str|
|00000350| 69 6e 67 20 68 65 72 65 | 0d 01 54 34 20 53 57 49 |ing here|..T4 SWI|
|00000360| 20 22 4f 53 5f 53 57 49 | 4e 75 6d 62 65 72 54 6f | "OS_SWI|NumberTo|
|00000370| 53 74 72 69 6e 67 22 20 | 20 20 20 20 20 20 20 3b |String" |       ;|
|00000380| 20 61 6e 64 20 63 6f 6e | 76 65 72 74 0d 01 5e 4b | and con|vert..^K|
|00000390| 20 4c 44 52 20 63 68 6b | 73 77 69 2c 5b 52 31 5d | LDR chk|swi,[R1]|
|000003a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000003b0| 20 20 20 3b 20 67 65 74 | 20 66 69 72 73 74 20 34 |   ; get| first 4|
|000003c0| 20 63 68 61 72 61 63 74 | 65 72 73 20 66 72 6f 6d | charact|ers from|
|000003d0| 20 73 74 72 69 6e 67 0d | 01 68 43 20 43 4d 50 20 | string.|.hC CMP |
|000003e0| 63 68 6b 73 77 69 2c 6e | 6f 74 73 77 69 20 20 20 |chkswi,n|otswi   |
|000003f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 |        |      ; |
|00000400| 69 66 20 22 55 73 65 72 | 22 20 74 68 65 6e 20 64 |if "User|" then d|
|00000410| 6f 6e 27 74 20 70 72 69 | 6e 74 0d 01 72 0e 20 42 |on't pri|nt..r. B|
|00000420| 4c 45 51 20 73 6b 69 70 | 0d 01 7c 43 20 43 4d 50 |LEQ skip|..|C CMP|
|00000430| 20 63 68 6b 73 77 69 2c | 6e 6f 74 78 73 77 69 20 | chkswi,|notxswi |
|00000440| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |        |       ;|
|00000450| 20 69 66 20 22 58 55 73 | 65 22 20 74 68 65 6e 20 | if "XUs|e" then |
|00000460| 64 6f 6e 27 74 20 70 72 | 69 6e 74 0d 01 86 0e 20 |don't pr|int.... |
|00000470| 42 4c 45 51 20 73 6b 69 | 70 0d 01 90 04 0d 01 9a |BLEQ ski|p.......|
|00000480| 14 20 53 57 49 20 22 4f | 53 5f 57 72 69 74 65 53 |. SWI "O|S_WriteS|
|00000490| 22 0d 01 a4 4c 20 45 51 | 55 53 20 22 53 57 49 20 |"...L EQ|US "SWI |
|000004a0| 3d 20 26 22 3a 45 51 55 | 42 20 30 20 20 20 20 20 |= &":EQU|B 0     |
|000004b0| 20 20 20 20 20 20 20 20 | 3b 20 70 72 69 6e 74 20 |        |; print |
|000004c0| 22 53 57 49 20 3d 20 26 | 3c 63 75 72 72 65 6e 74 |"SWI = &|<current|
|000004d0| 20 53 57 49 20 6e 75 6d | 62 65 72 3e 22 0d 01 ae | SWI num|ber>"...|
|000004e0| 14 20 4d 4f 56 20 52 30 | 2c 73 77 69 63 6f 75 6e |. MOV R0|,swicoun|
|000004f0| 74 0d 01 b8 12 20 41 44 | 52 20 52 31 2c 68 65 78 |t.... AD|R R1,hex|
|00000500| 62 75 66 0d 01 c2 0e 20 | 4d 4f 56 20 52 32 2c 23 |buf.... |MOV R2,#|
|00000510| 39 0d 01 cc 19 20 53 57 | 49 20 22 4f 53 5f 43 6f |9.... SW|I "OS_Co|
|00000520| 6e 76 65 72 74 48 65 78 | 38 22 0d 01 d6 12 20 41 |nvertHex|8".... A|
|00000530| 44 52 20 52 30 2c 68 65 | 78 62 75 66 0d 01 e0 14 |DR R0,he|xbuf....|
|00000540| 20 53 57 49 20 22 4f 53 | 5f 57 72 69 74 65 30 22 | SWI "OS|_Write0"|
|00000550| 0d 01 ea 37 20 53 57 49 | 20 22 4f 53 5f 57 72 69 |...7 SWI| "OS_Wri|
|00000560| 74 65 53 22 20 20 20 20 | 20 20 20 20 20 20 20 20 |teS"    |        |
|00000570| 20 20 20 20 20 20 20 3b | 20 70 72 69 6e 74 20 33 |       ;| print 3|
|00000580| 20 73 70 61 63 65 73 0d | 01 f4 0f 20 45 51 55 53 | spaces.|... EQUS|
|00000590| 20 22 20 20 20 22 0d 01 | fe 0b 20 45 51 55 42 20 | "   "..|.. EQUB |
|000005a0| 30 0d 02 08 35 20 41 44 | 52 20 52 30 2c 62 75 66 |0...5 AD|R R0,buf|
|000005b0| 66 65 72 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |fer     |        |
|000005c0| 20 20 20 20 20 20 20 20 | 3b 20 61 6e 64 20 53 57 |        |; and SW|
|000005d0| 49 20 6e 61 6d 65 0d 02 | 12 14 20 53 57 49 20 22 |I name..|.. SWI "|
|000005e0| 4f 53 5f 57 72 69 74 65 | 30 22 0d 02 1c 2e 20 53 |OS_Write|0".... S|
|000005f0| 57 49 20 22 4f 53 5f 4e | 65 77 4c 69 6e 65 22 20 |WI "OS_N|ewLine" |
|00000600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000610| 20 3b 20 43 52 2f 4c 46 | 0d 02 26 04 0d 02 30 0a | ; CR/LF|..&...0.|
|00000620| 20 2e 73 6b 69 70 0d 02 | 3a 3d 20 42 4c 20 63 68 | .skip..|:= BL ch|
|00000630| 6b 65 73 63 20 20 20 20 | 20 20 20 20 20 20 20 20 |kesc    |        |
|00000640| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 43 |        |     ; C|
|00000650| 68 65 63 6b 20 66 6f 72 | 20 65 73 63 61 70 65 20 |heck for| escape |
|00000660| 6b 65 79 0d 02 44 31 20 | 41 44 44 20 73 77 69 63 |key..D1 |ADD swic|
|00000670| 6f 75 6e 74 2c 73 77 69 | 63 6f 75 6e 74 2c 23 31 |ount,swi|count,#1|
|00000680| 20 20 20 20 20 20 20 20 | 20 20 3b 20 4e 65 78 74 |        |  ; Next|
|00000690| 20 53 57 49 0d 02 4e 48 | 20 43 4d 50 20 73 77 69 | SWI..NH| CMP swi|
|000006a0| 63 6f 75 6e 74 2c 23 26 | 46 46 30 30 30 30 30 30 |count,#&|FF000000|
|000006b0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 20 63 68 65 |        |   ; che|
|000006c0| 63 6b 20 74 6f 20 73 65 | 65 20 69 66 20 6d 61 78 |ck to se|e if max|
|000006d0| 20 72 65 61 63 68 65 64 | 20 79 65 74 0d 02 58 38 | reached| yet..X8|
|000006e0| 20 42 4e 45 20 6e 65 78 | 74 73 77 69 20 20 20 20 | BNE nex|tswi    |
|000006f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000700| 20 20 20 3b 20 e7 20 6e | 6f 74 20 74 68 65 6e 20 |   ; . n|ot then |
|00000710| 6c 6f 6f 70 0d 02 62 3d | 20 4c 44 4d 46 44 20 28 |loop..b=| LDMFD (|
|00000720| 73 70 29 21 2c 7b 70 63 | 7d 20 20 20 20 20 20 20 |sp)!,{pc|}       |
|00000730| 20 20 20 20 20 20 20 20 | 20 20 20 3b 20 65 6c 73 |        |   ; els|
|00000740| 65 20 72 65 74 75 72 6e | 20 74 6f 20 62 61 73 69 |e return| to basi|
|00000750| 63 0d 02 6c 04 0d 02 76 | 0c 20 2e 63 68 6b 65 73 |c..l...v|. .chkes|
|00000760| 63 0d 02 80 38 20 4d 4f | 56 20 52 30 2c 23 31 32 |c...8 MO|V R0,#12|
|00000770| 39 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |9       |        |
|00000780| 20 20 20 20 20 20 20 20 | 3b 20 4f 53 42 59 54 45 |        |; OSBYTE|
|00000790| 20 72 65 61 64 20 6b 65 | 79 0d 02 8a 0e 20 4d 4f | read ke|y.... MO|
|000007a0| 56 20 52 31 2c 23 30 0d | 02 94 0e 20 4d 4f 56 20 |V R1,#0.|... MOV |
|000007b0| 52 32 2c 23 30 0d 02 9e | 12 20 53 57 49 20 22 4f |R2,#0...|. SWI "O|
|000007c0| 53 5f 42 79 74 65 22 0d | 02 a8 39 20 43 4d 50 20 |S_Byte".|..9 CMP |
|000007d0| 52 31 2c 23 32 37 20 20 | 20 20 20 20 20 20 20 20 |R1,#27  |        |
|000007e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 |        |      ; |
|000007f0| 69 73 20 69 74 20 61 6e | 20 65 73 63 61 70 65 3f |is it an| escape?|
|00000800| 0d 02 b2 3b 20 4d 4f 56 | 4e 45 20 70 63 2c 6c 69 |...; MOV|NE pc,li|
|00000810| 6e 6b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |nk      |        |
|00000820| 20 20 20 20 20 20 20 3b | 20 4e 6f 3f 20 74 68 65 |       ;| No? the|
|00000830| 6e 20 69 67 6e 6f 72 65 | 20 69 74 0d 02 bc 3d 20 |n ignore| it...= |
|00000840| 4c 44 4d 46 44 20 28 73 | 70 29 21 2c 7b 70 63 7d |LDMFD (s|p)!,{pc}|
|00000850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000860| 20 20 3b 20 65 6c 73 65 | 20 72 65 74 75 72 6e 20 |  ; else| return |
|00000870| 74 6f 20 62 61 73 69 63 | 0d 02 c6 04 0d 02 d0 19 |to basic|........|
|00000880| 20 2e 6e 6f 74 75 73 65 | 64 20 45 51 55 53 20 22 | .notuse|d EQUS "|
|00000890| 55 73 65 72 22 0d 02 da | 19 20 20 20 20 20 20 20 |User"...|.       |
|000008a0| 20 20 20 45 51 55 53 20 | 22 58 55 73 65 22 0d 02 |   EQUS |"XUse"..|
|000008b0| e4 47 20 2e 62 75 66 66 | 65 72 20 20 45 51 55 53 |.G .buff|er  EQUS|
|000008c0| 20 22 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | "      |        |
|000008d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008f0| 20 20 20 20 22 0d 02 ee | 1e 20 2e 68 65 78 62 75 |    "...|. .hexbu|
|00000900| 66 20 20 45 51 55 53 20 | 22 20 20 20 20 20 20 20 |f  EQUS |"       |
|00000910| 20 20 22 0d 02 f8 06 20 | 5d 0d 03 02 06 20 ed 0d |  ".... |].... ..|
|00000920| 03 0c 0c 20 d6 20 63 6f | 64 65 25 0d 03 16 07 20 |... . co|de%.... |
|00000930| ef 33 0d ff             |                         |.3..    |        |
+--------+-------------------------+-------------------------+--------+--------+